home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Periodicals / develop / develop 10 code / LWFontUtility / NamerUtil / NamerUTIL.r < prev    next >
Encoding:
Text File  |  1992-04-08  |  2.7 KB  |  115 lines  |  [TEXT/MPS ]
  1. /*****************************************************************************************
  2.  
  3. NamerUTIL.r - Resources for the NamerUTIL
  4.  
  5. Written by Bryan K. Ressler (Beaker), 10/8/91
  6.  
  7. *****************************************************************************************/
  8.  
  9. #include "types.r"
  10. #include "systypes.r"
  11.  
  12. #include "NamerResIDs.h"    /* Contains our "relative" resource ids */
  13.  
  14. type 'uvrs' as 'vers';
  15. type 'USPC' {
  16.     integer = $$Countof(ResourceList);
  17.     array ResourceList {
  18.         unsigned longint;                        /* Resource type */
  19.         integer;                                /* Resource ID */
  20.     };
  21. };
  22.  
  23. resource 'DITL' (ResSpace + kNamerDlg, "Namer", purgeable) {
  24.     {
  25.         {88, 317, 108, 377}, Button { enabled, "Rename" },
  26.         {88, 234, 108, 294}, Button { enabled, "Cancel" },
  27.         {8, 8, 24, 378}, StaticText { disabled,
  28.             "Enter a new name for this printer, then click “Rename.”" },
  29.         {32, 8, 48, 378}, StaticText { disabled,
  30.             "Current name:  ^0" },
  31.         {56, 29, 72, 105}, StaticText { disabled, "New name:" },
  32.         {56, 110, 72, 378}, EditText { enabled, "" },
  33.         {84, 313, 112, 381}, UserItem { disabled }
  34.     }
  35. };
  36.  
  37. resource 'DITL' (ResSpace + kVerifyAlrt, "Namer Success", purgeable) {
  38.     {
  39.         {96, 208, 116, 268}, Button { enabled, "OK"},
  40.         {8, 72, 80, 288}, StaticText { disabled,
  41.             "The printer has been renamed.  Please reselect the printer (now named “^0”) in the Chooser."
  42.         }
  43.     }
  44. };
  45.  
  46. resource 'DITL' (ResSpace + kFailAlrt, "Namer Failure", purgeable) {
  47.     {
  48.         {54, 165, 74, 225}, Button { enabled, "OK" },
  49.         {8, 72, 40, 232}, StaticText { disabled,
  50.             "An error occurred while renaming the printer."
  51.         }
  52.     }
  53. };
  54.  
  55. resource 'DLOG' (ResSpace + kNamerDlg, "Namer", purgeable) {
  56.     {40, 20, 162, 412},
  57.     dBoxProc,
  58.     invisible,
  59.     noGoAway,
  60.     0x0,
  61.     ResSpace + kNamerDlg,
  62.     ""
  63. };
  64.  
  65. resource 'ALRT' (ResSpace + kVerifyAlrt, "Namer Success", purgeable) {
  66.     {44, 30, 172, 328},
  67.     ResSpace + kVerifyAlrt,
  68.     {
  69.         OK, visible, silent,
  70.         OK, visible, silent,
  71.         OK, visible, silent,
  72.         OK, visible, silent
  73.     }
  74. };
  75.  
  76. resource 'ALRT' (ResSpace + kFailAlrt, "Namer Failure", purgeable) {
  77.     {44, 30, 130, 270},
  78.     ResSpace + kFailAlrt,
  79.     {
  80.         OK, visible, sound1,
  81.         OK, visible, sound1,
  82.         OK, visible, sound1,
  83.         OK, visible, sound1
  84.     }
  85. };
  86.  
  87. resource 'STR#' (ResSpace + kNamerStrs, "Namer strings", purgeable) {
  88.     {
  89.         "%%[ Error: ",
  90.         "%%[ exitserver: permanent",
  91.         "serverdict begin 0 exitserver statusdict begin (",
  92.         ") setprintername end"
  93.     }
  94. };
  95.  
  96. resource 'uvrs' (ResSpace + kVersion) {
  97.     0x01,0x00,final,0x00,
  98.     verUS,
  99.     "1.0",
  100.     "1.0, © 1991 Apple Computer, Inc."
  101. };
  102.  
  103. resource 'USPC' (UTILID, "Installer specification", purgeable) {
  104.     {
  105.         'ALRT', ResSpace + kVerifyAlrt,
  106.         'ALRT', ResSpace + kFailAlrt,
  107.         'DITL', ResSpace + kNamerDlg,
  108.         'DITL', ResSpace + kVerifyAlrt,
  109.         'DITL', ResSpace + kFailAlrt,
  110.         'DLOG', ResSpace + kNamerDlg,
  111.         'STR#', ResSpace + kNamerStrs,
  112.         'uvrs', ResSpace + kVersion
  113.     }
  114. };
  115.